home *** CD-ROM | disk | FTP | other *** search
- object Form1: TForm1
- Left = 475
- Top = 442
- BorderIcons = []
- BorderStyle = bsDialog
- Caption = 'Color Dialog'
- ClientHeight = 159
- ClientWidth = 325
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- object Label_Selection: TLabel
- Left = 256
- Top = 16
- Width = 38
- Height = 38
- AutoSize = False
- Color = clBlack
- ParentColor = False
- end
- object GroupBox1: TGroupBox
- Left = 13
- Top = 8
- Width = 217
- Height = 41
- TabOrder = 0
- object Label1: TLabel
- Left = 6
- Top = 15
- Width = 18
- Height = 18
- Color = clBlack
- ParentColor = False
- end
- object Label2: TLabel
- Left = 31
- Top = 15
- Width = 18
- Height = 18
- Color = clWhite
- ParentColor = False
- end
- object Label3: TLabel
- Left = 57
- Top = 15
- Width = 20
- Height = 18
- AutoSize = False
- Color = clRed
- ParentColor = False
- end
- object Label4: TLabel
- Left = 84
- Top = 15
- Width = 18
- Height = 18
- AutoSize = False
- Color = clLime
- ParentColor = False
- end
- object Label5: TLabel
- Left = 111
- Top = 15
- Width = 18
- Height = 18
- AutoSize = False
- Color = clBlue
- ParentColor = False
- end
- object Label6: TLabel
- Left = 137
- Top = 15
- Width = 18
- Height = 18
- AutoSize = False
- Color = clAqua
- ParentColor = False
- end
- object Label7: TLabel
- Left = 163
- Top = 15
- Width = 18
- Height = 18
- AutoSize = False
- Color = clFuchsia
- ParentColor = False
- end
- object Label8: TLabel
- Left = 191
- Top = 15
- Width = 18
- Height = 18
- AutoSize = False
- Color = clYellow
- ParentColor = False
- end
- end
- object GroupBox2: TGroupBox
- Left = 13
- Top = 60
- Width = 217
- Height = 91
- TabOrder = 1
- object Label9: TLabel
- Left = 2
- Top = 15
- Width = 31
- Height = 18
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'Red'
- end
- object Label10: TLabel
- Left = 2
- Top = 41
- Width = 31
- Height = 13
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'Green'
- end
- object Label11: TLabel
- Left = 2
- Top = 67
- Width = 31
- Height = 13
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'Blue'
- end
- object ScrollBar_Red: TScrollBar
- Left = 40
- Top = 15
- Width = 169
- Height = 17
- LargeChange = 10
- Max = 255
- TabOrder = 0
- OnChange = ScrollBar_Change
- end
- object ScrollBar_Green: TScrollBar
- Left = 40
- Top = 41
- Width = 169
- Height = 17
- LargeChange = 10
- Max = 255
- TabOrder = 1
- OnChange = ScrollBar_Change
- end
- object ScrollBar_Blue: TScrollBar
- Left = 40
- Top = 67
- Width = 169
- Height = 17
- LargeChange = 10
- Max = 255
- TabOrder = 2
- OnChange = ScrollBar_Change
- end
- end
- object ButtonCancel: TButton
- Left = 238
- Top = 108
- Width = 75
- Height = 21
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 2
- end
- object ButtonOk: TButton
- Left = 238
- Top = 76
- Width = 75
- Height = 21
- Caption = 'OK'
- Default = True
- ModalResult = 1
- TabOrder = 3
- end
- end
-